/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_4 / issue_09 / runimpdoc / !RunImpDoc / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 0d 00 14 19 54 61 73 6b | 4e 61 6d 65 24 3d 22 52 |....Task|Name$="R|
|00000020| 75 6e 49 6d 70 44 6f 63 | 22 0d 00 1e 05 3a 0d 00 |unImpDoc|"....:..|
|00000030| 28 05 3a 0d 00 32 0e f2 | 53 65 74 55 70 57 69 6d |(.:..2..|SetUpWim|
|00000040| 70 0d 00 3c 2a 44 6f 63 | 54 6f 4f 70 65 6e 24 3d |p..<*Doc|ToOpen$=|
|00000050| a4 52 65 61 64 4f 53 56 | 61 72 56 61 6c 28 22 44 |.ReadOSV|arVal("D|
|00000060| 6f 63 24 54 6f 4f 70 65 | 6e 22 29 0d 00 46 0d f2 |oc$ToOpe|n")..F..|
|00000070| 50 6f 6c 6c 4c 6f 6f 70 | 0d 00 50 29 c8 99 20 22 |PollLoop|..P).. "|
|00000080| 57 69 6d 70 5f 43 6c 6f | 73 65 44 6f 77 6e 22 2c |Wimp_Clo|seDown",|
|00000090| 54 61 73 6b 69 64 25 2c | 26 34 42 35 33 34 31 35 |Taskid%,|&4B53415|
|000000a0| 34 0d 00 5a 2d e7 20 4e | 6f 74 41 63 6b 6e 6f 77 |4..Z-. N|otAcknow|
|000000b0| 6c 65 64 67 65 64 25 20 | 8c 20 ff 28 22 52 75 6e |ledged% |. .("Run|
|000000c0| 20 22 2b 44 6f 63 54 6f | 4f 70 65 6e 24 29 0d 00 | "+DocTo|Open$)..|
|000000d0| 64 05 e0 0d 00 6e 05 3a | 0d 00 78 05 3a 0d 00 82 |d....n.:|..x.:...|
|000000e0| 0f dd 20 f2 50 6f 6c 6c | 4c 6f 6f 70 0d 00 8c 11 |.. .Poll|Loop....|
|000000f0| ea 20 6d 61 73 6b 25 2c | 71 75 69 74 25 0d 00 96 |. mask%,|quit%...|
|00000100| 16 4e 6f 74 41 63 6b 6e | 6f 77 6c 65 64 67 65 64 |.NotAckn|owledged|
|00000110| 25 3d a3 0d 00 a0 18 f2 | 53 65 6e 64 44 61 74 61 |%=......|SendData|
|00000120| 4f 70 65 6e 4d 65 73 73 | 61 67 65 0d 00 aa 0b 6d |OpenMess|age....m|
|00000130| 61 73 6b 25 3d 30 0d 00 | b4 0b 71 75 69 74 25 3d |ask%=0..|..quit%=|
|00000140| a3 0d 00 be 05 f5 0d 00 | c8 29 c8 99 20 22 57 69 |........|.).. "Wi|
|00000150| 6d 70 5f 50 6f 6c 6c 22 | 2c 6d 61 73 6b 25 2c 62 |mp_Poll"|,mask%,b|
|00000160| 6c 6f 63 6b 25 20 b8 20 | 72 65 61 73 6f 6e 25 0d |lock% . |reason%.|
|00000170| 00 d2 10 c8 8e 20 72 65 | 61 73 6f 6e 25 20 ca 0d |..... re|ason% ..|
|00000180| 00 dc 25 c9 20 31 37 2c | 31 38 20 3a 20 e7 20 62 |..%. 17,|18 : . b|
|00000190| 6c 6f 63 6b 25 21 31 36 | 3d 34 20 8c 20 71 75 69 |lock%!16|=4 . qui|
|000001a0| 74 25 3d b9 0d 00 e6 3b | 20 20 20 20 20 20 20 20 |t%=....;|        |
|000001b0| 20 20 20 20 20 f4 20 41 | 6e 6f 74 68 65 72 20 74 |     . A|nother t|
|000001c0| 61 73 6b 20 28 70 72 65 | 73 75 6d 61 62 6c 79 20 |ask (pre|sumably |
|000001d0| 49 6d 70 72 65 73 73 69 | 6f 6e 29 20 68 61 73 0d |Impressi|on) has.|
|000001e0| 00 f0 3b 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..;     |        |
|000001f0| f4 20 61 63 6b 6e 6f 77 | 6c 65 64 67 65 64 20 6f |. acknow|ledged o|
|00000200| 75 72 20 72 65 71 75 65 | 73 74 20 74 6f 20 6c 6f |ur reque|st to lo|
|00000210| 61 64 20 61 20 66 69 6c | 65 2e 0d 00 fa 28 c9 20 |ad a fil|e....(. |
|00000220| 31 39 20 20 20 20 3a 20 | 4e 6f 74 41 63 6b 6e 6f |19    : |NotAckno|
|00000230| 77 6c 65 64 67 65 64 25 | 3d b9 3a 71 75 69 74 25 |wledged%|=.:quit%|
|00000240| 3d b9 0d 01 04 39 20 20 | 20 20 20 20 20 20 20 20 |=....9  |        |
|00000250| 20 20 20 f4 20 4f 75 72 | 20 72 65 71 75 65 73 74 |   . Our| request|
|00000260| 20 68 61 73 20 6e 6f 74 | 20 62 65 65 6e 20 61 63 | has not| been ac|
|00000270| 6b 6e 6f 77 6c 65 64 67 | 65 64 2e 0d 01 0e 05 cb |knowledg|ed......|
|00000280| 0d 01 18 0b fd 20 71 75 | 69 74 25 0d 01 22 05 e1 |..... qu|it%.."..|
|00000290| 0d 01 2c 05 3a 0d 01 36 | 05 3a 0d 01 40 1a dd 20 |..,.:..6|.:..@.. |
|000002a0| f2 53 65 6e 64 44 61 74 | 61 4f 70 65 6e 4d 65 73 |.SendDat|aOpenMes|
|000002b0| 73 61 67 65 0d 01 4a 0f | 21 62 6c 6f 63 6b 25 3d |sage..J.|!block%=|
|000002c0| 32 35 36 0d 01 54 27 62 | 6c 6f 63 6b 25 21 31 32 |256..T'b|lock%!12|
|000002d0| 3d 30 3a 62 6c 6f 63 6b | 25 21 31 36 3d 35 3a 62 |=0:block|%!16=5:b|
|000002e0| 6c 6f 63 6b 25 21 32 30 | 3d 30 0d 01 5e 27 62 6c |lock%!20|=0..^'bl|
|000002f0| 6f 63 6b 25 21 32 38 3d | 30 3a 62 6c 6f 63 6b 25 |ock%!28=|0:block%|
|00000300| 21 33 32 3d 30 3a 62 6c | 6f 63 6b 25 21 33 36 3d |!32=0:bl|ock%!36=|
|00000310| 30 0d 01 68 13 62 6c 6f | 63 6b 25 21 34 30 3d 26 |0..h.blo|ck%!40=&|
|00000320| 32 30 30 30 0d 01 72 1b | 24 28 62 6c 6f 63 6b 25 |2000..r.|$(block%|
|00000330| 2b 34 34 29 3d 44 6f 63 | 54 6f 4f 70 65 6e 24 0d |+44)=Doc|ToOpen$.|
|00000340| 01 7c 20 3f 28 62 6c 6f | 63 6b 25 2b 34 34 2b a9 |.| ?(blo|ck%+44+.|
|00000350| 28 44 6f 63 54 6f 4f 70 | 65 6e 24 29 29 3d 30 0d |(DocToOp|en$))=0.|
|00000360| 01 86 25 c8 99 20 22 57 | 69 6d 70 5f 53 65 6e 64 |..%.. "W|imp_Send|
|00000370| 4d 65 73 73 61 67 65 22 | 2c 31 38 2c 62 6c 6f 63 |Message"|,18,bloc|
|00000380| 6b 25 2c 30 0d 01 90 05 | e1 0d 01 9a 05 3a 0d 01 |k%,0....|.....:..|
|00000390| a4 05 3a 0d 01 ae 10 dd | 20 f2 53 65 74 55 70 57 |..:.....| .SetUpW|
|000003a0| 69 6d 70 0d 01 b8 1e de | 20 62 6c 6f 63 6b 25 20 |imp.....| block% |
|000003b0| 26 31 30 30 30 2c 65 72 | 72 62 6c 6b 25 20 32 35 |&1000,er|rblk% 25|
|000003c0| 36 0d 01 c2 27 f4 20 54 | 61 73 6b 69 64 25 3d 46 |6...'. T|askid%=F|
|000003d0| 4e 57 69 6d 70 49 6e 69 | 74 28 32 30 30 2c 54 61 |NWimpIni|t(200,Ta|
|000003e0| 73 6b 4e 61 6d 65 24 29 | 0d 01 cc 43 c8 99 20 22 |skName$)|...C.. "|
|000003f0| 57 69 6d 70 5f 49 6e 69 | 74 69 61 6c 69 73 65 22 |Wimp_Ini|tialise"|
|00000400| 2c 32 30 30 2c 26 34 42 | 35 33 34 31 35 34 2c 54 |,200,&4B|534154,T|
|00000410| 61 73 6b 4e 61 6d 65 24 | 20 b8 20 56 65 72 73 69 |askName$| . Versi|
|00000420| 6f 6e 25 2c 54 61 73 6b | 69 64 25 0d 01 d6 19 ee |on%,Task|id%.....|
|00000430| 20 85 20 f2 45 72 72 6f | 72 28 54 61 73 6b 4e 61 | . .Erro|r(TaskNa|
|00000440| 6d 65 24 29 0d 01 e0 05 | e1 0d 01 ea 05 3a 0d 01 |me$)....|.....:..|
|00000450| f4 05 3a 0d 01 fe 1d dd | 20 a4 52 65 61 64 4f 53 |..:.....| .ReadOS|
|00000460| 56 61 72 56 61 6c 28 76 | 61 72 6e 61 6d 65 24 29 |VarVal(v|arname$)|
|00000470| 0d 02 08 1b ea 20 74 65 | 6d 70 31 25 2c 74 65 6d |..... te|mp1%,tem|
|00000480| 70 32 25 2c 6c 65 6e 67 | 74 68 25 0d 02 12 1b de |p2%,leng|th%.....|
|00000490| 20 74 65 6d 70 31 25 20 | 31 30 30 2c 74 65 6d 70 | temp1% |100,temp|
|000004a0| 32 25 20 31 30 30 0d 02 | 1c 14 24 74 65 6d 70 32 |2% 100..|..$temp2|
|000004b0| 25 3d 76 61 72 6e 61 6d | 65 24 0d 02 26 38 c8 99 |%=varnam|e$..&8..|
|000004c0| 20 22 4f 53 5f 52 65 61 | 64 56 61 72 56 61 6c 22 | "OS_Rea|dVarVal"|
|000004d0| 2c 74 65 6d 70 32 25 2c | 74 65 6d 70 31 25 2c 31 |,temp2%,|temp1%,1|
|000004e0| 30 30 2c 30 2c 33 20 b8 | 20 2c 2c 6c 65 6e 67 74 |00,0,3 .| ,,lengt|
|000004f0| 68 25 0d 02 30 15 74 65 | 6d 70 31 25 3f 6c 65 6e |h%..0.te|mp1%?len|
|00000500| 67 74 68 25 3d 31 33 0d | 02 3a 10 76 61 72 24 3d |gth%=13.|.:.var$=|
|00000510| 24 74 65 6d 70 31 25 0d | 02 44 09 3d 76 61 72 24 |$temp1%.|.D.=var$|
|00000520| 0d 02 4e 05 3a 0d 02 58 | 05 3a 0d 02 62 17 dd 20 |..N.:..X|.:..b.. |
|00000530| f2 45 72 72 6f 72 28 54 | 61 73 6b 4e 61 6d 65 24 |.Error(T|askName$|
|00000540| 29 0d 02 6c 0e 21 65 72 | 72 62 6c 6b 25 3d 9f 0d |)..l.!er|rblk%=..|
|00000550| 02 76 22 24 28 65 72 72 | 62 6c 6b 25 2b 34 29 3d |.v"$(err|blk%+4)=|
|00000560| f6 24 2b 22 20 61 74 20 | 6c 69 6e 65 20 22 2b c3 |.$+" at |line "+.|
|00000570| 9e 0d 02 80 1f 65 72 72 | 62 6c 6b 25 3f 28 34 2b |.....err|blk%?(4+|
|00000580| a9 24 28 65 72 72 62 6c | 6b 25 2b 34 29 29 3d 30 |.$(errbl|k%+4))=0|
|00000590| 0d 02 8a 2d c8 99 20 22 | 57 69 6d 70 5f 52 65 70 |...-.. "|Wimp_Rep|
|000005a0| 6f 72 74 45 72 72 6f 72 | 22 2c 65 72 72 62 6c 6b |ortError|",errblk|
|000005b0| 25 2c 31 2c 54 61 73 6b | 4e 61 6d 65 24 0d 02 9e |%,1,Task|Name$...|
|000005c0| 2b c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |+.. "Wim|p_CloseD|
|000005d0| 6f 77 6e 22 2c 54 61 73 | 6b 69 64 25 2c 26 34 42 |own",Tas|kid%,&4B|
|000005e0| 35 33 34 31 35 34 3a e0 | 0d 02 a8 05 e1 0d 02 b2 |534154:.|........|
|000005f0| 04 0d 02 bc 04 0d 02 c6 | 13 62 55 46 46 20 4c 4f |........|.bUFF LO|
|00000600| 56 45 53 20 68 55 47 48 | 0d 02 d0 04 0d ff       |VES hUGH|......  |
+--------+-------------------------+-------------------------+--------+--------+